home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / langs / prolog68.zoo / prolog.68 / codes / shell.wam < prev    next >
Encoding:
Text File  |  1994-06-03  |  5.0 KB  |  89 lines
  1. Top-level shell
  2. p'break' 138 512 16 544 -16 127 2048 -12 127 2048 -8 127 2048 -4 514 p'repeat'
  3. 0 128 177 '| ?- ' 516 292 176 'user_input' 145 -4 146 -8 516 204 160 -4
  4. 16 145 -12 514 p'expand_term'/2 4 128 177 '|: ' 516 292 144 -8 161 -4 12
  5. 514 p'exec'/2 4 160 -4 8 177 'end_of_file' 516 136 548 -8 513 20 518
  6.  
  7. p'default_error_handler'/4 188 512 16 1 -12 2 -16 113 -4 127 2048 -8 514
  8. p'error_name'/2 0 176 '!?   ERROR : ' 514 p'werr'/1 0 160 -4 16 514 p'werr'/1
  9. 4 176 ' in' 514 p'werr'/1 0 545 -4 538 58 385 480 0 488 548 -4 176 ' argument '
  10. 514 p'werr'/1 0 144 -8 514 p'werr'/1 0 176 ' of' 514 p'werr'/1 0 519 4 540
  11. 514 p'werrnl' 8 176 '!?   ------- ' 514 p'werr'/1 0 144 -4 514 p'werr'/1
  12. 4 514 p'werrnl' 0 520 513 12 518
  13.  
  14. p'enough'/1 148 528 144 18 12 532 8 4 64 518 534 96 258 177 0 259 176 'user_output'
  15. 512 8 127 2048 -8 127 2048 -4 516 268 176 'user_output' 516 332 128 177
  16. '' 516 292 176 'user_input' 145 -4 516 244 144 -4 514 p'skiplf'/1 0 545
  17. -8 538 28 160 -4 8 177 0 475 516 128 548 -8 520 519 4 540 513 20 518 520
  18.  
  19. p'error_name'/2 322 528 318 318 186 532 18 8 48 'generic_error' 49 'Generic error'
  20. 518 533 16 48 'type_error' 49 'Type mismatch' 518 533 16 48 'instantiation_error'
  21. 49 'Instantiation fault' 518 533 16 48 'range_error' 49 'Value out of range'
  22. 518 533 16 48 'existence_error' 49 'Object doesn\'t exist' 518 533 16 48
  23. 'expression_error' 49 'Variable bound to non-integer in expression.' 518
  24. 533 16 48 'zero_division_error' 49 'Division by zero.' 518 533 16 48 'input_output_error'
  25. 49 'Input/output error' 518 533 16 48 'memory_error' 49 'Out of memory error'
  26. 518 534 48 'system_error' 49 'System error' 518 529 120 [ 'existence_error'
  27. -106 'expression_error' -88 'generic_error' -178 'input_output_error' -52
  28. 'instantiation_error' -142 'memory_error' -34 'range_error' -124 'system_error'
  29. -18 'type_error' -160 'zero_division_error' -70] 520
  30.  
  31. p'exec'/2 316 528 296 278 260 532 74 8 512 8 0 -8 544 -4 538 14 144 -8 516
  32. 640 519 12 540 144 -8 516 664 548 -4 176 'type_error' 177 0 3 210 'call'/1
  33. 337 513 20 517 80 533 18 80 ':-'/1 288 547 515 p'not_debugging'/1 533 12
  34. 48 'end_of_file' 547 518 533 36 96 288 512 4 272 547 514 p'compile'/1 0
  35. 144 -4 513 16 515 p'compile'/1 533 52 512 8 1 -4 544 -8 522 0 144 -4 514
  36. p'printvars'/1 0 144 -4 514 p'enough'/1 4 548 -4 513 16 518 534 176 'user_output'
  37. 512 0 514 p'nl'/1 0 176 'user_output' 177 'no' 516 212 176 'user_output'
  38. 513 12 515 p'nl'/1 535 -254 8 536 -164 536 -116 537 -66 535 -272 8 536 -168
  39. 536 -134 537 -84 535 -290 8 536 -220 536 -152 537 -102
  40.  
  41. p'expression_error_handler'/4 134 512 16 0 -8 2 -16 144 -8 113 -4 127 2048
  42. -12 514 p'error_name'/2 0 176 '!?   ERROR : ' 514 p'werr'/1 0 160 -4 16
  43. 514 p'werr'/1 4 514 p'werrnl' 0 545 -8 144 -4 177 'expression_error' 516
  44. 128 548 -8 176 '!?   ------- ' 514 p'werr'/1 8 144 -4 514 p'werr'/1 4 514
  45. p'werrnl' 0 520 513 12 518
  46.  
  47. p'init_global_error_handlers' 198 512 4 544 -4 176 'generic_error' 129 178
  48. 'default_error_handler' 516 92 176 'type_error' 129 178 'default_error_handler'
  49. 516 92 176 'instantiation_error' 129 178 'default_error_handler' 516 92
  50. 176 'range_error' 129 178 'default_error_handler' 516 92 176 'existence_error'
  51. 129 178 'default_error_handler' 516 92 176 'expression_error' 129 178 'expression_error_handler'
  52. 516 92 176 'zero_division_error' 129 178 'expression_error_handler' 516
  53. 92 176 'input_output_error' 129 178 'default_error_handler' 516 92 176 'memory_error'
  54. 129 178 'default_error_handler' 516 92 176 'system_error' 129 178 'default_error_handler'
  55. 516 92 548 -4 513 16 518
  56.  
  57. p'printvars'/1 112 528 68 68 6 532 58 4 64 547 176 'user_output' 512 0 514
  58. p'nl'/1 0 176 'user_output' 177 'yes' 516 212 176 'user_output' 513 12 515
  59. p'nl'/1 534 512 4 0 -4 144 -4 177 0 3 130 514 p'numbervars'/3 0 144 -4 513
  60. 16 515 p'prvars'/1
  61.  
  62. p'prvars'/1 116 528 112 18 12 532 8 4 64 518 534 96 289 512 12 274 81 ','/2
  63. 273 272 176 'user_output' 514 p'nl'/1 0 144 -4 514 p'wtext'/1 4 176 'user_output'
  64. 177 ' = ' 516 212 176 'user_output' 145 -4 514 p'print'/2 4 144 -4 513 16
  65. 515 p'prvars'/1 520
  66.  
  67. p'shell' 80 512 0 514 p'init_global_error_handlers' 0 176 'user_output'
  68. 514 p'nl'/1 0 176 'user_output' 177 'Prolog-68 awaiting commands.' 516 212
  69. 176 'user_output' 514 p'nl'/1 0 210 'shell_abort'/1 288 177 'break' 513
  70. 12 515 p'if_exception'/3
  71.  
  72. p'shell_abort'/1 144 532 74 4 512 4 544 -4 516 640 548 -4 176 'user_output'
  73. 177 '[Abort to Prolog top-level.]' 516 212 176 'user_output' 514 p'nl'/1
  74. 4 210 'shell_abort'/1 288 177 'break' 513 12 515 p'if_exception'/3 534 512
  75. 4 0 -4 176 '!?   ERROR : Uncaught exception ' 514 p'werr'/1 0 144 -4 514
  76. p'werr'/1 4 514 p'werrnl' 0 210 'shell_abort'/1 288 177 'break' 513 12 515
  77. p'if_exception'/3
  78.  
  79. p'skiplf'/1 68 532 30 4 512 4 544 -4 514 p'is_endline'/1 0 548 -4 513 16
  80. 518 534 176 'user_input' 512 4 113 -4 516 244 160 -4 4 513 16 515 p'skiplf'/1
  81.  
  82. p'werr'/1 14 240 4 176 'user_error' 517 212
  83.  
  84. p'werrnl' 12 176 'user_error' 515 p'nl'/1
  85.  
  86. p'wtext'/1 60 528 56 18 12 532 8 4 64 518 534 96 290 512 4 272 242 4 176
  87. 'user_output' 516 268 144 -4 513 16 515 p'wtext'/1 520
  88.  
  89.